home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-03
/
imb9110.zip
/
BITLIST.BI
< prev
next >
Wrap
Text File
|
1991-10-01
|
829b
|
21 lines
'****************************************************
'* BITLIST.BI - structure definitions, constants, *
'* and function defintions for the *
'* bit list handler functions *
'****************************************************
CONST blCLEAR = 1 ' Clear all bits
CONST blSET = 2 ' Set all bits
CONST blINVERT = 3 ' Invert all bits
CONST blUNION = 4 ' Merge two lists
CONST blINTERSECT = 5 ' Keep intersecting bits
CONST blCOPY = 6 ' Copy bitlist
CONST NULL = 0 ' status value for some errors
DECLARE FUNCTION blCreate (Size%)
DECLARE SUB blDestroy (BitList%)
DECLARE FUNCTION blGetBit (bl%, BitNum%)
DECLARE FUNCTION blSetBit (bl%, BitNum%, State%)
DECLARE FUNCTION blListOp (Op%, bl1%, bl2%)